home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Macademic for Students & Teachers
/
Macademic for Students and Teachers (Quantum Leap)(1992).iso
/
Fun & Games
/
BashBB
/
BashBB
next >
Wrap
Text File
|
1985-10-21
|
2KB
|
95 lines
/* Planes version 0.1 -- Created by A-Team™ 1/5/85 */
/* { Fred Huxham, Dave Burnard & Jim Takatsuka } */
/* { & Peter X. Moore - resident C jock } */
/* ateam%amber@Berkeley.ARPA */
/* created using Consulair Mac C Development System */
/* & */
/* Apple Macintosh Development System */
#include "maccdefs.h"
#include "Quickdraw.h"
#include "Window.h"
#include "Events.h"
#include "Control.h"
#define NIL 0
#define FALSE 0
#define TRUE 0xFF
main()
{
EventRecord event;
short windowcode;
WindowPtr thewindow;
CursHandle thecursor;
Rect icon1,icon2,icon3,icon4;
Handle ibm;
SetRect(&screen,0,0,512,342);
SetRect(&icon1,100,100,132,132);
EraseRect(&screen);
thecursor=GetCursor(1962);
ibm=GetIcon(1962);
PlotIcon(&icon1,ibm);
SetCursor(thecursor);
while (0xFF)
{
if (GetNextEvent(everyEvent,&event))
{
switch (event.what)
{
case mouseDown:
{
windowcode=FindWindow(&event.where,&thewindow);
i=0;
switch (windowcode)
{
case inDesk:
{
break;
} /* end of case inDesk */
case inMenuBar:
{
break;
} /* end of case inMenuBar */
case inSysWindow:
{
break;
} /* end of case inSysWindow */
case inContent:
{
break;
} /* end of case inContent */
case inDrag:
{
break;
} /* end of case inDrag */
case inGrow:
{
break;
} /* end of case inGrow */
case inGoAway:
{
break;
} /* end of case inGoAway */
} /* end of switch(windowcode) */
break;
} /* end of case mouseDown */
case keyDown:
{
ExitToShell();
break;
} /* end of case keyDown */
case nullEvent:
} /* end of switch(event.what) */
} /* end of if(GetNext...) */
} /* end of while(0xFF) */
} /* end of main() */